 Debug.Print "Patrn (" & patron & _
 ") Cadena (" & cadena & ")" & res & " es vlida."
